comint-read-input-ring: Simplify last commit

* lisp/comint.el (comint-read-input-ring): It is not necessary to use
  `goto-char' again since we have already moved point to the desired
  location (bug#45797).

diff --git a/lisp/comint.el b/lisp/comint.el
index 3476fd146cbff967eabcc49e462b9264c560be82..53153af7d27ef8fe82623f0239c5c8b319c23652 100644 (file)
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -1000,7 +1000,6 @@ See also `comint-input-ignoredups' and `comint-write-input-ring'."
                    (goto-char (match-end 0)))
                  (setq start (point))
                  (setq history (buffer-substring start end))
-                 (goto-char start)
                  (when (and (not (string-match history-ignore history))
                            (or (null ignoredups)
                                (ring-empty-p ring)